home *** CD-ROM | disk | FTP | other *** search
/ PC Player 43 / PCPLAYER43.iso / planetas / Demo / Demo.dxr / 00002_key control.ls < prev    next >
Encoding:
Text File  |  1998-10-23  |  315 b   |  17 lines
  1. on mykeyscript
  2.   case the key of
  3.     "m", "":
  4.       go(1)
  5.     "Q":
  6.       go("ExitDemo")
  7.     "c":
  8.       if not soundBusy(3) and the commandDown and the shiftDown then
  9.         Cursor_MacPC("hand", "hand.mask")
  10.       end if
  11.     "+":
  12.       if the commandDown then
  13.         go(the frame + 1)
  14.       end if
  15.   end case
  16. end
  17.